home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Language/OS - Multiplatform Resource Library
/
LANGUAGE OS.iso
/
lisp
/
eulisp
/
comp0_89.lha
/
Feel
/
Boot
/
Compiler
/
in-fast.fm
< prev
next >
Wrap
Text File
|
1993-07-16
|
7KB
|
1,557 lines
(standard0 list-fns boot bci module-operators stream comp-utl bci root)
19
2681
(name Link-Error direct-superclasses direct-slot-descriptions metaclass-hypotheses direct-initargs in-fast input "~a: ~a bytes ~a statics~%" 1 3 0 256 "Module not found" error-value "Binding not found" 31 %-no-module-% ".fm" ".em" "FEEL_OBJS_PATH" #\: "." "~a~a" (set-debug load-module) ((strip (union (import standard0) (import list-fns) (only (all-registered-modules) (union (import boot))) (only (boot-module-list load-bytecodes) (union (import bci))) (import module-operators) (import stream) (import comp-utl) (import bci) (import root))) set-debug load-module) in-fast)
36
0 0 17 0
5
0 0 0 0
3
0
31
0 0 120 0
17
1
36
0 0 27 0
5
0 0 0 0
4
0 0 27 0
46
1
(boot . make-installed-module)
34
2
36
0 0 50 0
5
0 0 0 0
8
3
4
0 0 25 0
5
0 0 28 0
3
0
39
8
0
5
0 0 29 0
3
0
39
28
1
17
1
1
(boot . install-local-bindings)
34
3
17
1
36
0 0 28 0
5
0 0 1 0
8
3
4
0 0 26 0
1
(boot . make-interface)
34
2
17
1
14
2
1
37
22
0
36
0 0 115 0
1
(init . make)
1
(errors . <condition-class>)
4
0 0 1 0
3
0
39
9
4
0 0 2 0
3
0
39
29
4
0 0 3 0
3
0
39
29
1
(errors . <condition>)
3
0
39
3
0
39
29
4
0 0 4 0
3
0
39
29
3
0
3
0
39
29
4
0 0 5 0
3
0
39
29
3
0
3
0
39
29
4
0 0 6 0
3
0
39
29
3
0
3
0
39
29
18
11
34
-2
7
0 0 30 0
36
0 9 89 0
11
4
0 0 7 0
5
0 0 0 0
39
51
1
7
0 0 29 0
3
0
7
0 0 31 0
3
0
7
0 0 32 0
36
0 9 41 0
11
4
0 0 7 0
6
1
39
51
1
7
0 0 28 0
36
0 7 196 0
11
4
0 0 7 0
6
2
39
51
1
7
0 0 33 0
36
0 7 116 0
11
4
0 0 7 0
6
3
39
51
4
7
0 0 34 0
36
0 6 248 0
11
4
0 0 7 0
6
4
39
51
2
7
0 0 35 0
36
0 6 26 0
11
4
0 0 7 0
6
5
39
51
3
7
0 0 36 0
36
0 5 51 0
11
4
0 0 7 0
6
6
39
51
1
7
0 0 37 0
1
(tables . make-table)
1
(boot . eq)
3
0
39
62
-1
7
0 0 38 0
36
0 4 108 0
11
4
0 0 7 0
6
7
39
51
2
7
0 0 39 0
36
0 3 145 0
11
4
0 0 7 0
6
8
39
51
2
7
0 0 40 0
36
0 2 162 0
11
4
0 0 7 0
6
9
39
51
0
7
0 0 41 0
36
0 1 229 0
11
4
0 0 7 0
6
10
39
51
1
7
0 0 42 0
4
0 0 19 0
4
0 0 29 0
39
3
0
39
9
4
0 0 20 0
1
(module-operators . dynamic-load-module)
39
3
0
39
29
18
7
0 0 43 0
36
0 1 110 0
11
4
0 0 7 0
6
11
39
51
1
7
0 0 44 0
36
0 0 201 0
11
4
0 0 7 0
6
12
39
51
3
7
0 0 45 0
36
0 0 42 0
11
4
0 0 7 0
6
13
39
51
2
7
0 0 46 0
1
(root . set-eum-function)
4
0 0 44 0
62
1
17
2
3
1
37
22
2
11
20
0
0
10
20
0
1
1
(calls . simple-call/cc)
36
0 0 14 0
12
40
1
14
5
2
62
1
37
22
1
10
20
0
0
1
(calls . push-handler)
36
0 0 76 0
12
40
2
62
1
18
36
0 0 28 0
1
(comp-utl . path-open)
12
19
1
0
8
4
19
1
1
3
0
12
34
-3
36
0 0 18 0
1
(streams1 . close)
12
10
33
1
17
2
3
1
1
(calls . pop-handler)
62
0
18
15
3
37
9
19
0
0
15
4
3
0
16
9
13
3
33
1
11
42
32
0 0 10 0
17
4
3
0
37
36
0 0 73 0
4
0 0 46 0
8
4
36
0 0 54 0
1
(extras0 . format)
3
0
4
0 0 24 0
8
12
3
0
39
9
36
0 0 19 0
1
(extras0 . caar)
8
16
10
34
1
3
0
39
29
18
12
34
-3
11
26
31
0 0 218 1
9
32
0 0 31 0
36
0 0 19 0
1
(extras0 . cdar)
8
6
10
34
1
15
5
9
13
3
33
1
4
0 0 45 0
8
5
8
5
27
8
5
12
14
10
4
9
13
5
18
3
0
31
0 0 139 1
4
0 0 45 0
11
4
0 0 43 0
36
0 0 32 0
1
(comp-utl . make-search-path)
4
0 0 21 0
4
0 0 22 0
4
0 0 23 0
12
34
3
12
14
7
4
9
13
5
18
3
0
31
0 0 197 1
18
4
0 0 12 0
3
0
31
0 0 5 0
11
42
32
0 0 10 0
17
3
3
0
37
11
26
42
32
0 0 68 0
4
0 0 18 0
3
0
39
9
12
3
0
39
29
3
0
3
0
39
29
18
36
0 0 37 0
3
0
8
6
27
1
(arith . +)
4
0 0 10 0
8
8
3
0
62
-3
3
0
31
0 0 73 1
14
5
2
39
37
1
(module-operators . module-name)
12
26
62
1
3
0
39
9
12
3
0
39
29
8
4
26
3
0
39
29
18
36
0 0 37 0
3
0
8
6
27
1
(arith . +)
4
0 0 10 0
8
8
3
0
62
-3
3
0
31
0 0 145 1
14
5
2
39
37
22
2
4
0 0 17 0
10
16
20
0
1
18
3
0
10
16
20
0
0
18
1
(boot . append)
36
0 0 62 0
1
(init . mapcar)
36
0 0 85 0
8
6
40
1
36
0 0 34 0
1
(gens . reverse)
36
0 0 17 0
1
(boot . all-registered-modules)
9
34
0
10
33
1
3
0
12
34
-3
36
0 0 28 0
4
0 0 42 0
1
(bci . boot-module-list)
62
0
3
0
31
0 1 27 1
11
14
5
3
9
13
4
34
2
1
(module-operators . module-name)
11
26
62
1
3
0
39
9
12
27
12
19
0
0
43
32
0 0 14 0
11
19
0
1
31
0 0 42 0
12
27
12
10
20
0
0
17
2
1
(arith . +)
12
19
0
1
4
0 0 10 0
3
0
62
-3
12
10
20
0
1
18
3
0
39
29
12
26
3
0
39
29
18
15
3
37
10
26
12
48
9
42
32
0 0 49 0
1
(init . error)
4
0 0 14 0
4
0 0 30 0
4
0 0 15 0
3
0
39
9
8
7
3
0
39
29
18
12
14
9
4
9
13
5
34
-3
1
(module-operators . module-binding-location)
36
0 0 19 0
1
(extras0 . caddr)
8
4
10
34
1
8
4
27
62
2
10
27
26
10
42
32
0 0 49 0
1
(init . error)
4
0 0 16 0
4
0 0 30 0
4
0 0 15 0
3
0
39
9
8
9
3
0
39
29
18
12
14
11
4
9
13
5
34
-3
1
(boot . nconc)
36
0 0 19 0
4
0 0 37 0
8
4
3
0
31
0 0 183 0
36
0 0 19 0
4
0 0 37 0
8
6
3
0
31
0 0 164 0
11
14
10
3
9
13
4
34
2
36
0 0 25 0
1
(table . table-ref)
4
0 0 38 0
8
5
27
11
33
2
9
32
0 0 15 0
9
26
12
26
43
31
0 0 7 0
3
0
32
0 0 22 0
1
(lists . copy-list)
10
27
14
6
2
62
1
37
36
0 0 21 0
4
0 0 40 0
8
6
8
6
3
0
31
0 1 23 1
36
0 0 48 0
36
0 0 26 0
1
(init . setter)
1
(table . table-ref)
10
33
1
4
0 0 38 0
8
7
27
8
8
26
8
6
39
12
33
3
18
15
5
1
(lists . copy-list)
16
62
1
37
1
(arith . <)
11
4
0 0 12 0
3
0
39
62
-2
36
0 0 19 0
1
(numbers . abs)
8
5
10
33
1
1
(arith . /)
10
4
0 0 13 0
3
0
62
-3
1
(arith . /)
10
4
0 0 13 0
3
0
62
-3
1
(arith . /)
10
4
0 0 13 0
3
0
62
-3
18
36
0 0 23 0
1
(numbers . modulo)
12
4
0 0 13 0
11
33
2
3
0
39
9
36
0 0 24 0
1
(numbers . modulo)
8
6
4
0 0 13 0
11
33
2
3
0
39
29
36
0 0 24 0
1
(numbers . modulo)
8
7
4
0 0 13 0
11
33
2
3
0
39
29
8
5
32
0 0 15 0
4
0 0 10 0
31
0 0 10 0
4
0 0 12 0
3
0
39
29
18
15
7
37
1
(streams . read)
12
62
1
36
0 0 18 0
1
(streams1 . end-of-stream-p)
12
10
34
1
32
0 0 27 0
36
0 0 19 0
1
(streams1 . close)
8
6
10
33
1
17
5
37
36
0 0 18 0
1
(numbers . numberp)
12
10
33
1
32
0 0 50 0
4
0 0 36 0
36
0 0 21 0
1
(stream . write-stream)
8
8
8
5
11
33
2
8
5
8
5
12
14
10
4
9
13
5
18
3
0
31
0 0 120 1
9
44
32
0 0 69 0
4
0 0 36 0
36
0 0 40 0
1
(stream . write-stream-list)
8
8
36
0 0 21 0
4
0 0 39 0
8
10
8
9
3
0
31
0 2 17 1
11
33
2
8
5
8
5
12
14
10
4
9
13
5
18
3
0
31
0 0 191 1
17
5
3
0
37
11
42
32
0 0 9 0
18
15
2
37
11
26
11
48
32
0 0 28 0
4
0 0 35 0
12
27
12
11
14
7
3
9
13
4
18
3
0
31
0 0 38 1
36
0 0 20 0
4
0 0 33 0
8
5
26
3
0
31
0 0 104 0
18
4
0 0 35 0
12
27
36
0 0 17 0
4
0 0 41 0
9
26
31
0 4 36 1
11
14
7
3
9
13
4
18
3
0
31
0 0 98 1
4
0 0 32 0
32
0 0 28 0
1
(bci . set-bc-global)
4
0 0 11 0
3
1
62
2
31
0 0 7 0
3
0
18
1
(bci . add-code-vector)
8
5
8
5
8
5
8
5
14
10
5
62
4
37
36
0 0 52 0
1
(streams1 . open)
36
0 0 19 0
1
(comp-utl . fast-file-name)
8
7
10
34
1
4
0 0 8 0
3
0
39
9
3
1
3
0
39
29
18
11
34
-2
1
(streams . read)
10
62
1
36
0 0 35 0
4
0 0 35 0
12
36
0 0 17 0
4
0 0 41 0
9
26
31
0 4 202 1
3
0
31
0 1 0 1
9
9
7
0 0 31 0
18
1
(streams . read)
12
62
1
1
(streams . read)
8
4
62
1
1
(streams . read)
8
5
62
1
36
0 0 69 0
1
(extras0 . format)
3
1
4
0 0 9 0
8
12
3
0
39
9
8
8
3
0
39
29
1
(arith . +)
1
(lists . list-length)
8
9
62
1
8
11
3
0
62
-3
3
0
39
29
18
12
34
-3
18
4
0 0 34 0
36
0 0 64 0
1
(extras0 . convert)
36
0 0 38 0
4
0 0 36 0
36
0 0 17 0
1
(stream . make-simple-stream)
9
34
0
8
13
8
12
3
0
31
0 2 118 1
1
(standard0 . pair)
11
34
2
12
12
1
(arith . +)
4
0 0 10 0
8
8
1
(lists . list-length)
8
4
62
1
3
0
39
62
-3
8
4
14
14
5
9
13
6
18
3
0
31
0 1 134 1
10
9
7
0 0 32 0
15
3
37
1
(module-operators . module-name)
36
0 0 19 0
4
0 0 33 0
8
5
3
0
31
0 1 113 1
14
4
2
62
1
37